#!/bin/bash
rm palabras.out
rm mensaje.out
rm cantidad.out
filename="letrero.in"
filesize=$(cat $filename | wc -l)
for (( i=1; i<=$(( $filesize )); i+=1 ))
do
    line=$(sed $i'q;d' $filename)
    sline="$(echo $line | wc -w)"
    word=($line)
    declare finalword
    declare cola
    declare primera
    
    final=$(( $sline-2 ))
    for (( j=1; j<$(( $sline ))-1; j+=1 ))
    do
        sprimera="$(echo ${#word[$j]})"
        ssegunda="$(echo ${#word[$j+1]})"
        if [[ $j == 1 ]]
        then
            primera="${word[$j]}"
        fi
        segunda="${word[$j+1]}"
        declare aux
        cola=""
        while [ $ssegunda != 0 ];
        do
            if [[ "$primera" == *"$segunda" ]]
            then
                #concatenar cola a primera, porque si hacen match segunda ya es parte de cola
                primera=$primera$cola
                let ssegunda=0
                if [[ $j == $final ]]
                then
                    echo $primera >> palabras.out
                    echo ${#primera} >> cantidad.out
                    finalword=$finalword" "$primera
                fi
            else
                if [[ $ssegunda == 1 ]]
                then
                    primera=$primera" "$segunda$cola
                    let ssegunda=0
                    if [[ $j == $final ]]
                    then
                        echo $primera >> palabras.out
                        echo ${#primera} >> cantidad.out
                        finalword=$finalword" "$primera
                    fi
                else
                    #cortar ultima letra a segunda
                    #guardar ultima letra en cola
                    cola=${segunda:${#segunda}-1:1}$cola
                    segunda=${segunda:0:-1}
                    let ssegunda="$(echo ${#segunda})"
                fi
            fi
        done   
    done    
done
echo $(((${#finalword})-1)) >> mensaje.out
echo $finalword >> mensaje.out

